MacTech 1 to 12

home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 01 - 1984 & 1985 / 01.12 Nov 85.sit / 01.12 Nov 85 / c / rotate 1-12 / Rotate.C < prev next >
MacBinary | 1985-09-18 | 4.4 KB | [TEXT/EDIT]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Wed Sep 18 19:35:42 1985, modified Wed Sep 18 19:35:42 1985, creator Macintosh Edit, type ASCII, 3827 bytes "Rotate.C" , at 0xf73 490 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[EDIT]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 52 6f 74 61 74 65 | 2e 43 00 00 00 00 00 00 |..Rotate|.C......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 0e f3 00 | 00 01 ea 99 b5 0c ce 99 |........|........|
|00000060| b5 0c ce 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 2c aa 00 00 |........|....,...|
|00000080| 2f 2a 2a 2a 2a 20 55 73 | 65 20 61 6c 74 53 74 61 |/**** Us|e altSta|
|00000090| 72 74 20 65 6e 74 72 79 | 20 2a 2a 2a 2a 2f 0d 0d |rt entry| ****/..|
|000000a0| 23 4f 70 74 69 6f 6e 73 | 20 2d 4e 0d 0d 2f 2a 20 |#Options| -N../* |
|000000b0| 46 6f 72 20 4d 61 63 20 | 43 20 6c 69 62 72 61 72 |For Mac |C librar|
|000000c0| 79 20 2a 2f 0d 23 69 6e | 63 6c 75 64 65 20 22 4c |y */.#in|clude "L|
|000000d0| 69 62 3a 53 74 64 69 6f | 2e 68 22 0d 23 69 6e 63 |ib:Stdio|.h".#inc|
|000000e0| 6c 75 64 65 20 22 4c 69 | 62 3a 4d 61 63 43 44 65 |lude "Li|b:MacCDe|
|000000f0| 66 73 2e 68 22 0d 0d 2f | 2a 20 46 6f 72 20 74 6f |fs.h"../|* For to|
|00000100| 6f 6c 62 6f 78 20 75 73 | 65 61 67 65 20 2a 2f 0d |olbox us|eage */.|
|00000110| 23 69 6e 63 6c 75 64 65 | 20 22 4c 69 62 3a 4d 61 |#include| "Lib:Ma|
|00000120| 63 44 65 66 73 2e 68 22 | 0d 23 69 6e 63 6c 75 64 |cDefs.h"|.#includ|
|00000130| 65 20 22 4c 69 62 3a 51 | 75 69 63 6b 44 72 61 77 |e "Lib:Q|uickDraw|
|00000140| 2e 68 22 0d 23 69 6e 63 | 6c 75 64 65 20 22 4c 69 |.h".#inc|lude "Li|
|00000150| 62 3a 57 69 6e 64 6f 77 | 2e 68 22 0d 0d 23 64 65 |b:Window|.h"..#de|
|00000160| 66 69 6e 65 20 70 6c 61 | 69 6e 44 42 6f 78 20 32 |fine pla|inDBox 2|
|00000170| 0d 23 64 65 66 69 6e 65 | 20 6e 6f 47 72 6f 77 44 |.#define| noGrowD|
|00000180| 6f 63 50 72 6f 63 20 34 | 0d 23 64 65 66 69 6e 65 |ocProc 4|.#define|
|00000190| 20 73 72 63 41 6e 64 20 | 6e 6f 74 53 72 63 42 69 | srcAnd |notSrcBi|
|000001a0| 63 0d 09 0d 23 64 65 66 | 69 6e 65 20 54 52 55 45 |c...#def|ine TRUE|
|000001b0| 20 31 0d 23 64 65 66 69 | 6e 65 20 46 41 4c 53 45 | 1.#defi|ne FALSE|
|000001c0| 20 30 0d 0d 23 64 65 66 | 69 6e 65 20 62 79 74 65 | 0..#def|ine byte|
|000001d0| 20 75 6e 73 69 67 6e 65 | 64 20 63 68 61 72 0d 23 | unsigne|d char.#|
|000001e0| 64 65 66 69 6e 65 20 77 | 6f 72 64 20 75 6e 73 69 |define w|ord unsi|
|000001f0| 67 6e 65 64 20 69 6e 74 | 0d 23 64 65 66 69 6e 65 |gned int|.#define|
|00000200| 20 6c 6f 6e 67 77 6f 72 | 64 20 75 6e 73 69 67 6e | longwor|d unsign|
|00000210| 65 64 20 6c 6f 6e 67 0d | 0d 73 74 61 74 69 63 20 |ed long.|.static |
|00000220| 42 69 74 4d 61 70 20 6d | 61 73 6b 42 69 74 73 20 |BitMap m|askBits |
|00000230| 3d 20 7b 30 2c 20 33 32 | 2c 20 30 2c 20 30 2c 20 |= {0, 32|, 0, 0, |
|00000240| 32 35 36 2c 20 32 35 36 | 7d 3b 20 20 2f 2a 20 41 |256, 256|};  /* A|
|00000250| 64 64 72 65 73 73 20 69 | 6e 69 74 20 61 74 20 72 |ddress i|nit at r|
|00000260| 75 6e 74 69 6d 65 20 2a | 2f 0d 73 74 61 74 69 63 |untime *|/.static|
|00000270| 20 42 69 74 4d 61 70 20 | 74 65 6d 70 42 69 74 73 | BitMap |tempBits|
|00000280| 20 3d 20 7b 30 2c 20 33 | 32 2c 20 30 2c 20 30 2c | = {0, 3|2, 0, 0,|
|00000290| 20 32 35 36 2c 20 32 35 | 36 7d 3b 20 20 2f 2a 20 | 256, 25|6};  /* |
|000002a0| 41 64 64 72 65 73 73 20 | 69 6e 69 74 20 61 74 20 |Address |init at |
|000002b0| 72 75 6e 74 69 6d 65 20 | 2a 2f 0d 73 74 61 74 69 |runtime |*/.stati|
|000002c0| 63 20 52 65 63 74 20 68 | 61 63 6b 52 65 63 74 20 |c Rect h|ackRect |
|000002d0| 3d 20 7b 30 2c 20 30 2c | 20 32 35 37 2c 20 32 35 |= {0, 0,| 257, 25|
|000002e0| 37 7d 3b 0d 0d 73 74 61 | 74 69 63 20 57 69 6e 64 |7};..sta|tic Wind|
|000002f0| 6f 77 50 74 72 20 69 6d | 61 67 65 57 69 6e 64 6f |owPtr im|ageWindo|
|00000300| 77 3b 0d 73 74 61 74 69 | 63 20 52 65 63 74 20 69 |w;.stati|c Rect i|
|00000310| 77 52 65 63 74 20 3d 20 | 7b 34 35 2c 20 32 33 31 |wRect = |{45, 231|
|00000320| 2c 20 33 30 31 2c 20 34 | 38 37 7d 3b 0d 0d 73 74 |, 301, 4|87};..st|
|00000330| 61 74 69 63 20 57 69 6e | 64 6f 77 50 74 72 20 74 |atic Win|dowPtr t|
|00000340| 74 79 57 69 6e 64 6f 77 | 3b 0d 73 74 61 74 69 63 |tyWindow|;.static|
|00000350| 20 52 65 63 74 20 74 77 | 52 65 63 74 20 3d 20 7b | Rect tw|Rect = {|
|00000360| 34 35 2c 20 31 35 2c 20 | 32 33 35 2c 20 31 38 35 |45, 15, |235, 185|
|00000370| 7d 3b 0d 0d 6d 61 69 6e | 28 29 0d 09 7b 0d 09 63 |};..main|()..{..c|
|00000380| 68 61 72 20 62 75 66 5b | 38 30 5d 3b 0d 09 77 6f |har buf[|80];..wo|
|00000390| 72 64 20 73 74 65 70 3b | 0d 09 52 65 63 74 20 78 |rd step;|..Rect x|
|000003a0| 52 65 63 74 2c 20 79 52 | 65 63 74 3b 0d 09 50 69 |Rect, yR|ect;..Pi|
|000003b0| 63 48 61 6e 64 6c 65 20 | 73 72 63 50 69 63 74 3b |cHandle |srcPict;|
|000003c0| 0d 09 77 6f 72 64 20 70 | 69 63 57 69 64 74 68 2c |..word p|icWidth,|
|000003d0| 20 70 69 63 48 65 69 67 | 68 74 3b 0d 09 77 6f 72 | picHeig|ht;..wor|
|000003e0| 64 20 69 3b 0d 09 77 6f | 72 64 20 73 68 69 66 74 |d i;..wo|rd shift|
|000003f0| 3b 0d 09 42 69 74 4d 61 | 70 20 2a 69 62 70 3b 0d |;..BitMa|p *ibp;.|
|00000400| 09 52 65 63 74 20 2a 69 | 72 70 3b 0d 09 0d 09 23 |.Rect *i|rp;....#|
|00000410| 48 69 64 65 43 75 72 73 | 6f 72 28 29 3b 0d 09 74 |HideCurs|or();..t|
|00000420| 74 79 57 69 6e 64 6f 77 | 20 3d 20 28 57 69 6e 64 |tyWindow| = (Wind|
|00000430| 6f 77 50 74 72 29 23 6e | 65 77 57 69 6e 64 6f 77 |owPtr)#n|ewWindow|
|00000440| 28 30 2c 20 26 74 77 52 | 65 63 74 2c 20 22 5c 30 |(0, &twR|ect, "\0|
|00000450| 30 37 43 6f 6e 74 72 6f | 6c 22 2c 20 54 52 55 45 |07Contro|l", TRUE|
|00000460| 2c 20 0d 09 09 09 6e 6f | 47 72 6f 77 44 6f 63 50 |, ....no|GrowDocP|
|00000470| 72 6f 63 2c 20 2d 31 2c | 20 46 41 4c 53 45 2c 20 |roc, -1,| FALSE, |
|00000480| 30 29 3b 0d 09 53 65 74 | 54 54 59 28 74 74 79 57 |0);..Set|TTY(ttyW|
|00000490| 69 6e 64 6f 77 29 3b 0d | 09 43 6c 65 61 72 54 54 |indow);.|.ClearTT|
|000004a0| 59 28 74 74 79 57 69 6e | 64 6f 77 29 3b 0d 09 0d |Y(ttyWin|dow);...|
|000004b0| 09 69 6d 61 67 65 57 69 | 6e 64 6f 77 20 3d 20 28 |.imageWi|ndow = (|
|000004c0| 57 69 6e 64 6f 77 50 74 | 72 29 23 6e 65 77 57 69 |WindowPt|r)#newWi|
|000004d0| 6e 64 6f 77 28 30 2c 20 | 26 69 77 52 65 63 74 2c |ndow(0, |&iwRect,|
|000004e0| 20 30 2c 20 54 52 55 45 | 2c 20 0d 09 09 09 70 6c | 0, TRUE|, ....pl|
|000004f0| 61 69 6e 44 42 6f 78 2c | 20 2d 31 2c 20 46 41 4c |ainDBox,| -1, FAL|
|00000500| 53 45 2c 20 30 29 3b 0d | 09 69 62 70 20 3d 20 26 |SE, 0);.|.ibp = &|
|00000510| 28 69 6d 61 67 65 57 69 | 6e 64 6f 77 2d 3e 70 6f |(imageWi|ndow->po|
|00000520| 72 74 42 69 74 73 29 3b | 0d 09 69 72 70 20 3d 20 |rtBits);|..irp = |
|00000530| 26 28 69 6d 61 67 65 57 | 69 6e 64 6f 77 2d 3e 70 |&(imageW|indow->p|
|00000540| 6f 72 74 52 65 63 74 29 | 3b 0d 09 0d 09 6d 61 73 |ortRect)|;....mas|
|00000550| 6b 42 69 74 73 2e 62 61 | 73 65 41 64 64 72 20 3d |kBits.ba|seAddr =|
|00000560| 20 28 50 74 72 29 63 61 | 6c 6c 6f 63 28 34 30 39 | (Ptr)ca|lloc(409|
|00000570| 36 2c 20 73 69 7a 65 6f | 66 28 77 6f 72 64 29 29 |6, sizeo|f(word))|
|00000580| 3b 0d 09 74 65 6d 70 42 | 69 74 73 2e 62 61 73 65 |;..tempB|its.base|
|00000590| 41 64 64 72 20 3d 20 28 | 50 74 72 29 63 61 6c 6c |Addr = (|Ptr)call|
|000005a0| 6f 63 28 34 30 39 36 2c | 20 73 69 7a 65 6f 66 28 |oc(4096,| sizeof(|
|000005b0| 77 6f 72 64 29 29 3b 0d | 09 0d 09 23 50 65 6e 4e |word));.|...#PenN|
|000005c0| 6f 72 6d 61 6c 28 29 3b | 0d 09 23 53 65 74 50 6f |ormal();|..#SetPo|
|000005d0| 72 74 28 69 6d 61 67 65 | 57 69 6e 64 6f 77 29 3b |rt(image|Window);|
|000005e0| 0d 09 23 53 65 74 52 65 | 63 74 28 26 78 52 65 63 |..#SetRe|ct(&xRec|
|000005f0| 74 2c 20 30 2c 20 30 2c | 20 31 32 38 2c 20 31 32 |t, 0, 0,| 128, 12|
|00000600| 38 29 3b 0d 09 23 50 61 | 69 6e 74 52 65 63 74 28 |8);..#Pa|intRect(|
|00000610| 26 78 52 65 63 74 29 3b | 0d 09 23 43 6f 70 79 42 |&xRect);|..#CopyB|
|00000620| 69 74 73 28 69 62 70 2c | 20 26 6d 61 73 6b 42 69 |its(ibp,| &maskBi|
|00000630| 74 73 2c 20 69 72 70 2c | 20 26 28 6d 61 73 6b 42 |ts, irp,| &(maskB|
|00000640| 69 74 73 2e 62 6f 75 6e | 64 73 29 2c 20 73 72 63 |its.boun|ds), src|
|00000650| 43 6f 70 79 2c 20 30 29 | 3b 0d 09 23 45 72 61 73 |Copy, 0)|;..#Eras|
|00000660| 65 52 65 63 74 28 69 72 | 70 29 3b 09 09 20 0d 0d |eRect(ir|p);.. ..|
|00000670| 09 23 4f 70 65 6e 52 65 | 73 46 69 6c 65 28 22 5c |.#OpenRe|sFile("\|
|00000680| 30 30 34 42 65 6c 6c 22 | 29 3b 0d 09 73 72 63 50 |004Bell"|);..srcP|
|00000690| 69 63 74 20 3d 20 28 50 | 69 63 48 61 6e 64 6c 65 |ict = (P|icHandle|
|000006a0| 29 23 47 65 74 52 65 73 | 6f 75 72 63 65 28 27 50 |)#GetRes|ource('P|
|000006b0| 49 43 54 27 2c 20 31 30 | 32 34 29 3b 0d 09 23 48 |ICT', 10|24);..#H|
|000006c0| 4c 6f 63 6b 28 73 72 63 | 50 69 63 74 29 3b 0d 09 |Lock(src|Pict);..|
|000006d0| 69 72 70 20 3d 20 26 28 | 28 2a 73 72 63 50 69 63 |irp = &(|(*srcPic|
|000006e0| 74 29 2d 3e 70 69 63 46 | 72 61 6d 65 29 3b 0d 09 |t)->picF|rame);..|
|000006f0| 70 69 63 57 69 64 74 68 | 20 3d 20 28 69 72 70 2d |picWidth| = (irp-|
|00000700| 3e 72 69 67 68 74 20 2d | 20 69 72 70 2d 3e 6c 65 |>right -| irp->le|
|00000710| 66 74 29 3b 0d 09 70 69 | 63 48 65 69 67 68 74 20 |ft);..pi|cHeight |
|00000720| 3d 20 28 69 72 70 2d 3e | 62 6f 74 74 6f 6d 20 2d |= (irp->|bottom -|
|00000730| 20 69 72 70 2d 3e 74 6f | 70 29 3b 0d 09 78 52 65 | irp->to|p);..xRe|
|00000740| 63 74 2e 6c 65 66 74 20 | 3d 20 28 32 35 36 20 2d |ct.left |= (256 -|
|00000750| 20 70 69 63 57 69 64 74 | 68 29 20 3e 3e 20 31 3b | picWidt|h) >> 1;|
|00000760| 0d 09 78 52 65 63 74 2e | 74 6f 70 20 3d 20 28 32 |..xRect.|top = (2|
|00000770| 35 36 20 2d 20 70 69 63 | 48 65 69 67 68 74 29 20 |56 - pic|Height) |
|00000780| 3e 3e 20 31 3b 0d 09 78 | 52 65 63 74 2e 72 69 67 |>> 1;..x|Rect.rig|
|00000790| 68 74 20 3d 20 78 52 65 | 63 74 2e 6c 65 66 74 20 |ht = xRe|ct.left |
|000007a0| 2b 20 70 69 63 57 69 64 | 74 68 3b 0d 09 78 52 65 |+ picWid|th;..xRe|
|000007b0| 63 74 2e 62 6f 74 74 6f | 6d 20 3d 20 78 52 65 63 |ct.botto|m = xRec|
|000007c0| 74 2e 74 6f 70 20 2b 20 | 70 69 63 48 65 69 67 68 |t.top + |picHeigh|
|000007d0| 74 3b 0d 09 23 44 72 61 | 77 50 69 63 74 75 72 65 |t;..#Dra|wPicture|
|000007e0| 28 73 72 63 50 69 63 74 | 2c 20 26 78 52 65 63 74 |(srcPict|, &xRect|
|000007f0| 29 3b 0d 09 23 48 55 6e | 6c 6f 63 6b 28 73 72 63 |);..#HUn|lock(src|
|00000800| 50 69 63 74 29 3b 0d 09 | 23 44 69 73 70 6f 73 48 |Pict);..|#DisposH|
|00000810| 61 6e 64 6c 65 28 73 72 | 63 50 69 63 74 29 3b 0d |andle(sr|cPict);.|
|00000820| 0d 09 53 65 74 54 54 59 | 28 74 74 79 57 69 6e 64 |..SetTTY|(ttyWind|
|00000830| 6f 77 29 3b 0d 09 70 75 | 74 73 28 22 53 69 6e 67 |ow);..pu|ts("Sing|
|00000840| 6c 65 20 73 74 65 70 20 | 5b 59 2f 4e 5d 3f 20 22 |le step |[Y/N]? "|
|00000850| 29 3b 0d 09 67 65 74 73 | 28 62 75 66 29 3b 0d 09 |);..gets|(buf);..|
|00000860| 70 75 74 73 28 22 5c 6e | 22 29 3b 0d 09 73 74 65 |puts("\n|");..ste|
|00000870| 70 20 3d 20 28 74 6f 75 | 70 70 65 72 28 62 75 66 |p = (tou|pper(buf|
|00000880| 5b 30 5d 29 20 3d 3d 20 | 27 59 27 29 20 3f 20 54 |[0]) == |'Y') ? T|
|00000890| 52 55 45 20 3a 20 46 41 | 4c 53 45 3b 0d 09 0d 09 |RUE : FA|LSE;....|
|000008a0| 69 72 70 20 3d 20 26 28 | 69 6d 61 67 65 57 69 6e |irp = &(|imageWin|
|000008b0| 64 6f 77 2d 3e 70 6f 72 | 74 52 65 63 74 29 3b 0d |dow->por|tRect);.|
|000008c0| 09 73 68 69 66 74 20 3d | 20 31 32 38 3b 0d 09 77 |.shift =| 128;..w|
|000008d0| 68 69 6c 65 28 73 68 69 | 66 74 20 3e 3d 20 31 29 |hile(shi|ft >= 1)|
|000008e0| 0d 09 09 7b 0d 09 09 69 | 66 28 73 74 65 70 29 0d |...{...i|f(step).|
|000008f0| 09 09 09 7b 0d 09 09 09 | 70 75 74 73 28 22 3c 52 |...{....|puts("<R|
|00000900| 65 74 75 72 6e 3e 20 74 | 6f 20 73 74 65 70 3a 20 |eturn> t|o step: |
|00000910| 22 29 3b 0d 09 09 09 67 | 65 74 73 28 62 75 66 29 |");....g|ets(buf)|
|00000920| 3b 0d 09 09 09 70 75 74 | 73 28 22 5c 6e 22 29 3b |;....put|s("\n");|
|00000930| 0d 09 09 09 7d 0d 09 09 | 23 53 65 74 52 65 63 74 |....}...|#SetRect|
|00000940| 28 26 78 52 65 63 74 2c | 20 30 2c 20 30 2c 20 32 |(&xRect,| 0, 0, 2|
|00000950| 35 36 2c 20 32 35 36 29 | 3b 0d 09 09 23 53 65 74 |56, 256)|;...#Set|
|00000960| 52 65 63 74 28 26 79 52 | 65 63 74 2c 20 30 2c 20 |Rect(&yR|ect, 0, |
|00000970| 30 2c 20 32 35 36 2c 20 | 32 35 36 29 3b 0d 09 09 |0, 256, |256);...|
|00000980| 2f 2a 20 53 74 65 70 20 | 31 20 2a 2f 0d 09 09 23 |/* Step |1 */...#|
|00000990| 43 6f 70 79 42 69 74 73 | 28 26 6d 61 73 6b 42 69 |CopyBits|(&maskBi|
|000009a0| 74 73 2c 20 26 74 65 6d | 70 42 69 74 73 2c 20 26 |ts, &tem|pBits, &|
|000009b0| 78 52 65 63 74 2c 20 26 | 78 52 65 63 74 2c 20 73 |xRect, &|xRect, s|
|000009c0| 72 63 43 6f 70 79 2c 20 | 30 29 3b 0d 09 09 2f 2a |rcCopy, |0);.../*|
|000009d0| 20 53 74 65 70 20 32 20 | 2a 2f 0d 09 09 23 4f 66 | Step 2 |*/...#Of|
|000009e0| 66 73 65 74 52 65 63 74 | 28 26 79 52 65 63 74 2c |fsetRect|(&yRect,|
|000009f0| 20 30 2c 20 73 68 69 66 | 74 29 3b 0d 09 09 23 43 | 0, shif|t);...#C|
|00000a00| 6f 70 79 42 69 74 73 28 | 26 6d 61 73 6b 42 69 74 |opyBits(|&maskBit|
|00000a10| 73 2c 20 26 74 65 6d 70 | 42 69 74 73 2c 20 26 78 |s, &temp|Bits, &x|
|00000a20| 52 65 63 74 2c 20 26 79 | 52 65 63 74 2c 20 73 72 |Rect, &y|Rect, sr|
|00000a30| 63 4f 72 2c 20 30 29 3b | 0d 09 09 2f 2a 20 53 74 |cOr, 0);|.../* St|
|00000a40| 65 70 20 33 20 2a 2f 0d | 09 09 23 43 6f 70 79 42 |ep 3 */.|..#CopyB|
|00000a50| 69 74 73 28 69 62 70 2c | 20 26 74 65 6d 70 42 69 |its(ibp,| &tempBi|
|00000a60| 74 73 2c 20 69 72 70 2c | 20 26 78 52 65 63 74 2c |ts, irp,| &xRect,|
|00000a70| 20 73 72 63 41 6e 64 2c | 20 30 29 3b 0d 09 09 2f | srcAnd,| 0);.../|
|00000a80| 2a 20 53 74 65 70 20 34 | 20 2a 2f 0d 09 09 23 43 |* Step 4| */...#C|
|00000a90| 6f 70 79 42 69 74 73 28 | 26 74 65 6d 70 42 69 74 |opyBits(|&tempBit|
|00000aa0| 73 2c 20 69 62 70 2c 20 | 26 78 52 65 63 74 2c 20 |s, ibp, |&xRect, |
|00000ab0| 69 72 70 2c 20 73 72 63 | 58 6f 72 2c 20 30 29 3b |irp, src|Xor, 0);|
|00000ac0| 0d 09 09 2f 2a 20 53 74 | 65 70 20 35 20 2a 2f 0d |.../* St|ep 5 */.|
|00000ad0| 09 09 23 4f 66 66 73 65 | 74 52 65 63 74 28 26 79 |..#Offse|tRect(&y|
|00000ae0| 52 65 63 74 2c 20 2d 73 | 68 69 66 74 2c 20 2d 73 |Rect, -s|hift, -s|
|00000af0| 68 69 66 74 29 3b 0d 09 | 09 23 43 6f 70 79 42 69 |hift);..|.#CopyBi|
|00000b00| 74 73 28 69 62 70 2c 20 | 26 74 65 6d 70 42 69 74 |ts(ibp, |&tempBit|
|00000b10| 73 2c 20 69 72 70 2c 20 | 26 79 52 65 63 74 2c 20 |s, irp, |&yRect, |
|00000b20| 73 72 63 58 6f 72 2c 20 | 30 29 3b 0d 09 09 2f 2a |srcXor, |0);.../*|
|00000b30| 20 53 74 65 70 20 36 20 | 2a 2f 0d 09 09 23 43 6f | Step 6 |*/...#Co|
|00000b40| 70 79 42 69 74 73 28 69 | 62 70 2c 20 69 62 70 2c |pyBits(i|bp, ibp,|
|00000b50| 20 69 72 70 2c 20 26 79 | 52 65 63 74 2c 20 73 72 | irp, &y|Rect, sr|
|00000b60| 63 4f 72 2c 20 30 29 3b | 0d 09 09 2f 2a 20 53 74 |cOr, 0);|.../* St|
|00000b70| 65 70 20 37 20 2a 2f 0d | 09 09 23 4f 66 66 73 65 |ep 7 */.|..#Offse|
|00000b80| 74 52 65 63 74 28 26 79 | 52 65 63 74 2c 20 73 68 |tRect(&y|Rect, sh|
|00000b90| 69 66 74 20 3c 3c 20 31 | 2c 20 30 29 3b 0d 09 09 |ift << 1|, 0);...|
|00000ba0| 23 43 6f 70 79 42 69 74 | 73 28 26 74 65 6d 70 42 |#CopyBit|s(&tempB|
|00000bb0| 69 74 73 2c 20 69 62 70 | 2c 20 26 78 52 65 63 74 |its, ibp|, &xRect|
|00000bc0| 2c 20 26 79 52 65 63 74 | 2c 20 73 72 63 58 6f 72 |, &yRect|, srcXor|
|00000bd0| 2c 20 30 29 3b 0d 09 09 | 0d 09 09 77 61 69 74 28 |, 0);...|...wait(|
|00000be0| 35 30 30 29 3b 0d 09 09 | 0d 09 09 2f 2a 20 53 74 |500);...|.../* St|
|00000bf0| 65 70 20 38 20 2a 2f 0d | 09 09 23 43 6f 70 79 42 |ep 8 */.|..#CopyB|
|00000c00| 69 74 73 28 69 62 70 2c | 20 26 74 65 6d 70 42 69 |its(ibp,| &tempBi|
|00000c10| 74 73 2c 20 69 72 70 2c | 20 26 78 52 65 63 74 2c |ts, irp,| &xRect,|
|00000c20| 20 73 72 63 43 6f 70 79 | 2c 20 30 29 3b 0d 09 09 | srcCopy|, 0);...|
|00000c30| 2f 2a 20 53 74 65 70 20 | 39 20 2a 2f 0d 09 09 23 |/* Step |9 */...#|
|00000c40| 4f 66 66 73 65 74 52 65 | 63 74 28 26 79 52 65 63 |OffsetRe|ct(&yRec|
|00000c50| 74 2c 20 2d 28 73 68 69 | 66 74 20 3c 3c 20 31 29 |t, -(shi|ft << 1)|
|00000c60| 2c 20 2d 73 68 69 66 74 | 29 3b 0d 09 09 23 43 6f |, -shift|);...#Co|
|00000c70| 70 79 42 69 74 73 28 69 | 62 70 2c 20 26 74 65 6d |pyBits(i|bp, &tem|
|00000c80| 70 42 69 74 73 2c 20 69 | 72 70 2c 20 26 79 52 65 |pBits, i|rp, &yRe|
|00000c90| 63 74 2c 20 73 72 63 58 | 6f 72 2c 20 30 29 3b 0d |ct, srcX|or, 0);.|
|00000ca0| 09 09 2f 2a 20 53 74 65 | 70 20 31 30 20 2a 2f 0d |../* Ste|p 10 */.|
|00000cb0| 09 09 23 43 6f 70 79 42 | 69 74 73 28 26 6d 61 73 |..#CopyB|its(&mas|
|00000cc0| 6b 42 69 74 73 2c 20 26 | 74 65 6d 70 42 69 74 73 |kBits, &|tempBits|
|00000cd0| 2c 20 26 78 52 65 63 74 | 2c 20 26 78 52 65 63 74 |, &xRect|, &xRect|
|00000ce0| 2c 20 73 72 63 41 6e 64 | 2c 20 30 29 3b 0d 09 09 |, srcAnd|, 0);...|
|00000cf0| 2f 2a 20 53 74 65 70 20 | 31 31 20 2a 2f 0d 09 09 |/* Step |11 */...|
|00000d00| 23 43 6f 70 79 42 69 74 | 73 28 26 74 65 6d 70 42 |#CopyBit|s(&tempB|
|00000d10| 69 74 73 2c 20 69 62 70 | 2c 20 26 78 52 65 63 74 |its, ibp|, &xRect|
|00000d20| 2c 20 69 72 70 2c 20 73 | 72 63 58 6f 72 2c 20 30 |, irp, s|rcXor, 0|
|00000d30| 29 3b 0d 09 09 2f 2a 20 | 53 74 65 70 20 31 32 20 |);.../* |Step 12 |
|00000d40| 2a 2f 0d 09 09 23 4f 66 | 66 73 65 74 52 65 63 74 |*/...#Of|fsetRect|
|00000d50| 28 26 79 52 65 63 74 2c | 20 73 68 69 66 74 20 3c |(&yRect,| shift <|
|00000d60| 3c 20 31 2c 20 73 68 69 | 66 74 20 3c 3c 20 31 29 |< 1, shi|ft << 1)|
|00000d70| 3b 0d 09 09 23 43 6f 70 | 79 42 69 74 73 28 26 74 |;...#Cop|yBits(&t|
|00000d80| 65 6d 70 42 69 74 73 2c | 20 69 62 70 2c 20 26 78 |empBits,| ibp, &x|
|00000d90| 52 65 63 74 2c 20 26 79 | 52 65 63 74 2c 20 73 72 |Rect, &y|Rect, sr|
|00000da0| 63 58 6f 72 2c 20 30 29 | 3b 0d 09 09 0d 09 09 2f |cXor, 0)|;....../|
|00000db0| 2a 20 53 74 65 70 20 31 | 33 20 2a 2f 0d 09 09 23 |* Step 1|3 */...#|
|00000dc0| 53 65 74 52 65 63 74 28 | 26 78 52 65 63 74 2c 20 |SetRect(|&xRect, |
|00000dd0| 30 2c 20 30 2c 20 31 32 | 38 2c 20 31 32 38 29 3b |0, 0, 12|8, 128);|
|00000de0| 0d 09 09 23 53 65 74 52 | 65 63 74 28 26 79 52 65 |...#SetR|ect(&yRe|
|00000df0| 63 74 2c 20 30 2c 20 31 | 32 38 2c 20 31 32 38 2c |ct, 0, 1|28, 128,|
|00000e00| 20 32 35 36 29 3b 0d 09 | 09 23 43 6f 70 79 42 69 | 256);..|.#CopyBi|
|00000e10| 74 73 28 26 6d 61 73 6b | 42 69 74 73 2c 20 26 6d |ts(&mask|Bits, &m|
|00000e20| 61 73 6b 42 69 74 73 2c | 20 26 68 61 63 6b 52 65 |askBits,| &hackRe|
|00000e30| 63 74 2c 20 26 78 52 65 | 63 74 2c 20 73 72 63 43 |ct, &xRe|ct, srcC|
|00000e40| 6f 70 79 2c 20 30 29 3b | 0d 09 09 2f 2a 20 53 74 |opy, 0);|.../* St|
|00000e50| 65 70 20 31 34 20 2a 2f | 0d 09 09 23 43 6f 70 79 |ep 14 */|...#Copy|
|00000e60| 42 69 74 73 28 26 6d 61 | 73 6b 42 69 74 73 2c 20 |Bits(&ma|skBits, |
|00000e70| 26 6d 61 73 6b 42 69 74 | 73 2c 20 26 78 52 65 63 |&maskBit|s, &xRec|
|00000e80| 74 2c 20 26 79 52 65 63 | 74 2c 20 73 72 63 43 6f |t, &yRec|t, srcCo|
|00000e90| 70 79 2c 20 30 29 3b 0d | 09 09 2f 2a 20 53 74 65 |py, 0);.|../* Ste|
|00000ea0| 70 20 31 35 20 2a 2f 0d | 09 09 23 53 65 74 52 65 |p 15 */.|..#SetRe|
|00000eb0| 63 74 28 26 78 52 65 63 | 74 2c 20 30 2c 20 30 2c |ct(&xRec|t, 0, 0,|
|00000ec0| 20 31 32 38 2c 20 32 35 | 36 29 3b 0d 09 09 23 53 | 128, 25|6);...#S|
|00000ed0| 65 74 52 65 63 74 28 26 | 79 52 65 63 74 2c 20 31 |etRect(&|yRect, 1|
|00000ee0| 32 38 2c 20 30 2c 20 32 | 35 36 2c 20 32 35 36 29 |28, 0, 2|56, 256)|
|00000ef0| 3b 0d 09 09 23 43 6f 70 | 79 42 69 74 73 28 26 6d |;...#Cop|yBits(&m|
|00000f00| 61 73 6b 42 69 74 73 2c | 20 26 6d 61 73 6b 42 69 |askBits,| &maskBi|
|00000f10| 74 73 2c 20 26 78 52 65 | 63 74 2c 20 26 79 52 65 |ts, &xRe|ct, &yRe|
|00000f20| 63 74 2c 20 73 72 63 43 | 6f 70 79 2c 20 30 29 3b |ct, srcC|opy, 0);|
|00000f30| 0d 09 09 0d 09 09 73 68 | 69 66 74 20 3e 3e 3d 20 |......sh|ift >>= |
|00000f40| 31 3b 0d 09 09 7d 0d 09 | 70 75 74 73 28 22 3c 52 |1;...}..|puts("<R|
|00000f50| 65 74 75 72 6e 3e 20 74 | 6f 20 65 78 69 74 3a 20 |eturn> t|o exit: |
|00000f60| 22 29 3b 0d 09 67 65 74 | 73 28 62 75 66 29 3b 0d |");..get|s(buf);.|
|00000f70| 09 7d 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.}......|........|
|00000f80| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 d4 |........|........|
|00000f90| 76 3a 51 50 53 65 74 75 | 70 2e 43 45 52 00 00 00 |v:QPSetu|p.CER...|
|00000fa0| 00 00 00 34 f5 34 02 34 | 01 36 00 00 00 01 37 51 |...4.4.4|.6....7Q|
|00000fb0| 08 52 6f 74 61 74 65 2e | 43 74 02 00 00 00 54 45 |.Rotate.|Ct....TE|
|00000fc0| 58 54 45 44 49 54 01 00 | 00 40 00 40 00 00 00 01 |XTEDIT..|.@.@....|
|00000fd0| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 40 00 40 |..TEXTED|IT...@.@|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 99 b3 3f 1b 00 00 | 0e f3 00 00 01 ea 63 6f |....?...|......co|
|00001000| 75 6e 74 00 bb 09 04 73 | 00 db 38 ff dd bb fd 04 |unt....s|..8.....|
|00001010| 53 74 72 32 35 35 00 bb | 11 04 50 6f 69 6e 74 00 |Str255..|..Point.|
|00001020| fb 0a 04 76 68 00 db 38 | 02 dd bb 0c 04 61 6c 6c |...vh..8|.....all|
|00001030| 00 bb fd bb 11 04 52 65 | 63 74 00 fb 10 fb 0a 04 |......Re|ct......|
|00001040| 74 6f 70 00 bb 0a 04 6c | 65 66 74 00 bb 0a 04 62 |top....l|eft....b|
|00001050| 6f 74 74 6f 6d 00 bb 0a | 04 72 69 67 68 74 00 bb |ottom...|.right..|
|00001060| fd 04 52 30 00 bb 10 fb | 11 04 50 6f 69 6e 74 00 |..R0....|..Point.|
|00001070| 04 74 6f 70 4c 65 66 74 | 00 bb 11 04 50 6f 69 6e |.topLeft|....Poin|
|00001080| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f 00 00 00 |.......M|onaco...|
|00001090| 00 04 00 06 00 03 00 00 | 01 00 00 00 01 16 00 00 |........|........|
|000010a0| 00 16 00 00 00 d4 00 00 | cc 1c 00 98 00 00 00 1c |........|........|
|000010b0| 00 46 00 01 45 46 4e 54 | 00 00 00 12 45 54 41 42 |.F..EFNT|....ETAB|
|000010c0| 00 00 00 1e 03 eb 00 00 | 00 00 00 00 00 01 5f c4 |........|......_.|
|000010d0| 03 ec 00 47 00 00 00 0e | 00 01 5f c0 46 4f 42 4a |...G....|.._.FOBJ|
|000010e0| ff ff ff ff 00 07 18 bc | 00 07 18 be 00 07 18 c0 |........|........|
|000010f0| 00 07 18 c2 00 07 18 c4 | 00 07 18 c6 00 07 18 c8 |........|........|
|00001100| 00 07 18 ca 00 07 18 26 | 00 07 18 cc 00 07 18 ce |.......&|........|
|00001110| 00 07 18 ce 00 07 18 ce | 00 07 18 ce 00 07 18 ce |........|........|
|00001120| 00 07 18 46 4f 42 4a ff | ff ff ff 00 07 18 bc 00 |...FOBJ.|........|
|00001130| 07 18 be 00 07 18 c0 00 | 07 18 c2 00 07 18 c4 00 |........|........|
|00001140| 07 18 c6 00 07 18 c8 00 | 07 18 ca 00 07 18 26 00 |........|......&.|
|00001150| 07 18 cc 00 07 18 ce 00 | 07 18 ce 00 07 18 ce 00 |........|........|
|00001160| 07 18 ce 00 07 18 ce 00 | 07 18 00 00 00 00 00 00 |........|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+